FCLOSE IEXP

 Function
  Close open file channel IEXP.

 Syntax
  FCLOSE chan

   chan  - An integer expression with the open channel to close
           (0 through 7).

 Remarks
  This statement should be used to close a file channel after it has been
  created/opened with an FCREATE, FOPEN, or FAPPEND statement.  If you
  should forget to close your files by the end of your PPL application,
  PPL will automatically close them for you.  However, if you need to
  process many files, it will usually be required that you open a few at
  a time and close them before going on to the next set of files.

 Examples
  FOPEN 1,"C:\PCB\MAIN\PPE.LOG",O_RD,S_DW
  FGET 1,hdr
  FCLOSE 1
  IF (hdr <> "Creating PPE.LOG file . . .") THEN
   PRINTLN "Error: PPE.LOG invalid"
   END
  ENDIF